object MainForm: TMainForm
  Left = 205
  Top = 114
  Width = 479
  Height = 340
  Caption = 'MDI Application'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  PixelsPerInch = 96
  Position = poDefault
  WindowMenu = Window1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  TextHeight = 16
  object WPToolBar1: TWPToolBar
    Left = 0
    Top = 0
    Width = 471
    Height = 54
    Align = alTop
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    BevelInner = bvRaised
    BevelOuter = bvNone
    sel_ListBoxes = [SelFontName, SelFontSize, SelFontColor, SelBackgroundColor]
    sel_StatusIcons = [SelNormal, SelBold, SelItalic, SelUnder, SelHyperLink, SelStrikeOut, SelLeft, SelRight, SelBlock, SelCenter]
    sel_ActionIcons = [SelExit, SelNew, SelOpen, SelSave, SelClose, SelPrint, SelPrintSetup]
    sel_DatabaseIcons = []
    sel_EditIcons = [SelCopy, SelCut, SelPaste, SelSelAll, SelHideSel, SelFind, SelReplace, SelSpellCheck]
    FontSizeFrom = 8
    OnIconSelection = WPToolBar1IconSelection
    Hints.Strings = (
      'WPI_Normal=Normal'
      'WPI_Bold=Bold'
      'WPI_Italic=Italic'
      'WPI_Under=Under'
      'WPI_Hyperlink=Hyperlink'
      'WPI_StrikeOut=StrikeOut'
      'WPI_Left=Left'
      'WPI_Right=Right'
      'WPI_Justified=Justified'
      'WPI_Center=Center'
      'WPI_Copy=Copy'
      'WPI_Cut=Cut'
      'WPI_Paste=Paste'
      'WPI_SelAll=SelAll'
      'WPI_HideSel=HideSel'
      'WPI_Find=Find'
      'WPI_Replace=Replace'
      'WPI_Spell=Spell'
      'WPI_Exit=Exit'
      'WPI_New=New'
      'WPI_Open=Open'
      'WPI_Save=Save'
      'WPI_Close=Close'
      'WPI_Print=Print'
      'WPI_PrintSetup=PrintSetup'
      'WPI_Next=Next'
      'WPI_Prev=Prev'
      'WPI_Add=Add'
      'WPI_Del=Del'
      'WPI_Edit=Edit'
      'WPI_Cancel=Cancel'
      'WPI_ToStart=ToStart'
      'WPI_ToEnd=ToEnd'
      'WPI_Post=Post')
    object Preview: TButton
      Left = 355
      Top = 29
      Width = 49
      Height = 17
      Caption = 'Preview'
      TabOrder = 0
      OnClick = PreviewClick
    end
  end
  object WPAltStatusBar1: TWPAltStatusBar
    Top = 277
    Width = 471
    Height = 17
    ShowSizer = True
    ShowGauge = True
    UseGaugeForWP = True
    GaugeValue = 0
    GaugeWidth = 100
    Strings.Strings = (
      '300stStatus=stStatus'
      '300stFileName=stFileName'
      '100stTxtFmt=stTxtFmt')
    Align = alBottom
  end
  object MainMenu1: TMainMenu
    Left = 36
    Top = 196
    object File1: TMenuItem
      Caption = '&File'
      Hint = 'Dateibefehle'
      object FileNewItem: TMenuItem
        Caption = '&New'
        Hint = 'Neue Datei erzeugen'
        OnClick = FileNewItemClick
      end
      object FileOpenItem: TMenuItem
        Caption = '&Open'
        Hint = 'Existierende Datei �ffnen'
        OnClick = FileOpenItemClick
      end
      object FileCloseItem: TMenuItem
        Caption = '&Close'
        Hint = 'Aktuelle Datei schlie�en'
        OnClick = FileCloseItemClick
      end
      object FileSaveItem: TMenuItem
        Caption = '&Save'
        Hint = 'Aktuelle Datei speichern'
        OnClick = FileSaveItemClick
      end
      object FileSaveAsItem: TMenuItem
        Caption = 'Save &as ...'
        Hint = 'Aktuelle Datei speichern unter...'
        OnClick = FileSaveAsItemClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object FileExitItem: TMenuItem
        Caption = '&Exit'
        Hint = 'Anwendung beenden'
        OnClick = FileExitItemClick
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      object CutItem: TMenuItem
        Caption = 'Cut'
        Hint = 'In die Zwischenablage verschieben'
        OnClick = CutItemClick
      end
      object CopyItem: TMenuItem
        Caption = '&Copy'
        Hint = 'In die Zwischenablage kopieren'
        OnClick = CopyItemClick
      end
      object PasteItem: TMenuItem
        Caption = '&Paste'
        Hint = 'Aus der der Zwischenablage einf�gen'
        OnClick = PasteItemClick
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      Hint = 'Befehle zum Anordnen von Fenstern'
      object WindowCascadeItem: TMenuItem
        Caption = 'Cascade'
        Hint = 'Fenster �berlappend anordnen'
        OnClick = WindowCascadeItemClick
      end
      object WindowTileItem: TMenuItem
        Caption = 'Tile Vertical'
        Hint = 'Fenster nicht �berlappend anordnen'
        OnClick = WindowTileItemClick
      end
      object WindowArrangeItem: TMenuItem
        Caption = 'Arrange Icons'
        Hint = 'Fenstersymbole am unteren Rand des Hauptfensters anordnen'
        OnClick = WindowArrangeItemClick
      end
      object WindowMinimizeItem: TMenuItem
        Caption = 'Minimize all'
        Hint = 'Alle Fenster verkleinern'
        OnClick = WindowMinimizeItemClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      Hint = 'Hilfethemen'
      object HelpAboutItem: TMenuItem
        Caption = '&Info'
      end
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'Alle Dateien (*.*)|*.*'
    Left = 4
    Top = 196
  end
end